Dim myTextListener As New TextWriterTraceListener(File.Create("c:\mojDziennik.log"))
Trace.Listeners.Add(myTextListener)
